<?php
foreach ($_GET['lekarze'] as $key => $value) {
    $lekarze = $lekarze.$value.', ';
}
$lekarze = substr($lekarze, 0, -2);
session_start();
define('FPDF_FONTPATH','../pdf/font/');
require('../pdf/fpdf.php');
include('../funct.php');

$pdf=new FPDF();
$pdf->AddFont('Calligrapher','','arial_ce.php');
$pdf->AddPage();
$pdf->Image('../img/logo.png',165,8,33);
$pdf->SetFont('Calligrapher','',9);
$pdf->Text(10, 10, iconv('UTF-8','windows-1250//TRANSLIT',"NIEPUBLICZNY ZAKŁAD OPIEKI ZDROWOTNEJ"));
$pdf->Text(30, 13, "DARMEDICUS");
$pdf->SetFont('Calligrapher','',8);
$pdf->Text(18, 16, "04-364 Warszawa, ul. Wiatraczna 15 lok - U1");
$pdf->Text(29, 19, "tel/fax (22) 465 17 91");

$pdf->Text(175, 43, date("Y-m-d"));
$pdf->Ln(15);
$pdf->SetFont('Calligrapher','',14);
$pdf->MultiCell(0,10,'HISTORIA WIZYT PACJENTA', 0, "C");
$pdf->Ln(5);
$sql="select pac.pac_nazwisko, pac.pac_imie, pac.pac_pesel from pac where pac.id = ".$_GET['pac_id'];
$result=mysql_query($sql);
$pac = @mysql_fetch_array($result);
$pac['naz']=iconv('UTF-8','windows-1250//TRANSLIT', $pac[0]);
$pac['imie']=iconv('UTF-8','windows-1250//TRANSLIT', $pac[1]);
$pdf->SetFont('Calligrapher','',12);
$pdf->Text(40, 40, "Pacjent ".$pac['naz']." ".$pac['imie']);
$pdf->Text(40, 45, "PESEL:".$pac[2]);
$pdf->Ln(10);
$pdf->SetFont('Calligrapher','',12);



$sql="SELECT DATE_FORMAT( wizyty.data, '%Y-%m-%d' ) AS 
		data , sl_gab.nazwa, wizyty.id, wizyty_inf.wywiad, wizyty_inf.badanie, wizyty_inf.zalecenia, sl_uslugi.nazwa as typ_wiz
		, sl_uslugi.id_grupy, sl_uslugi.nazwa_opis
		FROM wizyty
		LEFT JOIN wizyty_inf ON wizyty.id = wizyty_inf.id_wiz
		LEFT JOIN sl_gab ON sl_gab.id = wizyty.id_gab
		LEFT JOIN sl_uslugi ON sl_uslugi.id = wizyty.typ_wiz
		
		WHERE wizyty.akt =1
		and
		 wizyty.id_pac =".$_GET['pac_id']." 
                and sl_gab.id in (".$lekarze.")
		order by data desc";
		#echo $sql;
		
		
		$result=mysql_query($sql);
		logg($sql, $_SESSION['u']);
	while($row = mysql_fetch_array($result))
	{
                $pdf->Ln(3);
                $getx=$pdf->GetX();
                $gety=$pdf->GetY();
                $pdf->Line($getx, $gety, $getx+190, $gety);
		$pdf->MultiCell(0,10,iconv('UTF-8','windows-1250//TRANSLIT',$row['nazwa'].' - '.$row['typ_wiz'].' - '.$row[0]), 0, "C");
                $getx=$pdf->GetX();
                $gety=$pdf->GetY();
                $pdf->Line($getx, $gety, $getx+190, $gety);
		
	if ($row['id_grupy']==1) {
            #$pdf->MultiCell(0,10,'WYWIAD', 0, "C");
            $pdf->MultiCell(0,5,iconv('UTF-8','windows-1250//TRANSLIT','WYWIAD: '.$row['wywiad']), 0, "J");
            $pdf->Ln(3);
            #$pdf->MultiCell(0,10,'BADANIE', 0, "C");
            $pdf->MultiCell(0,5,iconv('UTF-8','windows-1250//TRANSLIT','BADANIE: '.$row['badanie']), 0, "J");
            $pdf->Ln(3);
            #$pdf->MultiCell(0,10,'ZALECENIA', 0, "C");
            $pdf->MultiCell(0,5,iconv('UTF-8','windows-1250//TRANSLIT','ZALECENIA: '.$row['zalecenia']), 0, "J");
        }
		elseif ($row['id_grupy']==2) {
                        #$pdf->MultiCell(0,10,'BADANIE', 0, "C");
                        $pdf->MultiCell(0,5,iconv('UTF-8','windows-1250//TRANSLIT','BADANIE: '.$row['badanie']), 0, "J");
		}
		elseif ($row['id_grupy']==3) {
			$opis_bad=explode('###!!!', $row['badanie']);

                        #$pdf->MultiCell(0,10,'WYWIAD', 0, "C");
                        $pdf->MultiCell(0,5,iconv('UTF-8','windows-1250//TRANSLIT','WYWIAD: '.$row['wywiad']), 0, "J");
                        $pdf->Ln(3);
                        #$pdf->MultiCell(0,10,'BADANIE', 0, "C");
                        $pdf->MultiCell(0,5,iconv('UTF-8','windows-1250//TRANSLIT','BADANIE: '.$opis_bad[0]), 0, "J");
                        $pdf->Ln(3);
                        #$pdf->MultiCell(0,10,'BADANIE: '.$row['nazwa_opis'], 0, "C");
                        $pdf->MultiCell(0,5,iconv('UTF-8','windows-1250//TRANSLIT','BADANIE '.$row['nazwa_opis'].': '.$opis_bad[1]), 0, "J");
                        $pdf->Ln(3);
                        #$pdf->MultiCell(0,10,'ZALECENIA', 0, "C");
                        $pdf->MultiCell(0,5,iconv('UTF-8','windows-1250//TRANSLIT','ZALECENIA: '.$row['zalecenia']), 0, "J");

			//echo '<b>Wywiad:</b><br>'.$row['wywiad'].'<br><b>Badanie:</b><br>'.$opis_bad[0].'<br><b>Badanie: '.$row['nazwa_opis'].'</b><br>'.$opis_bad[1].'<br><b>Zalecenia:</b><br>'.$row['zalecenia'].'<hr>';
		}
		
		#echo '<b>Wywiad:</b><br>'.$row['wywiad'].'<br><b>Badanie:</b><br>'.$row['badanie'].'<br><b>Zalecenia:</b><br>'.$row['zalecenia'].'<hr>';	
                
                
                }


//$sql="select * from wizyty_inf where wizyty_inf.id_wiz = ".$_GET['wiz'];
//$result=mysql_query($sql);
//$pac_inf = @mysql_fetch_array($result);
//#
//$pdf->Ln(5);
//$pac_inf['wyw']=iconv('UTF-8','windows-1250//TRANSLIT', $pac_inf[1]);
//$pac_inf['bad']=iconv('UTF-8','windows-1250//TRANSLIT', $pac_inf[2]);
//$pac_inf['zalecenia']=iconv('UTF-8','windows-1250//TRANSLIT', $pac_inf[3]);
//$pdf->MultiCell(0,5,$pac_inf['wyw'], 0, "J");
//$pdf->Ln(10);
//$pdf->MultiCell(0,10,'BADANIE', 0, "C");
//$pdf->MultiCell(0,5,$pac_inf['bad'], 0, "J");
//$pdf->Ln(10);
//$pdf->MultiCell(0,10,'ZALECENIA', 0, "C");
//$pdf->MultiCell(0,5,$pac_inf['zalecenia'], 0, "J");
//$osy=$pdf->GetY();
////if ($_SESSION['uzytk']['podpis']<>'') $pdf->Image('../img/pieczatki/'.$_SESSION['uzytk']['podpis'], 135,$osy,46);
$nazwa_pliku=iconv('UTF-8', 'ASCII//TRANSLIT//IGNORE', $pac['naz']."_".$pac['imie']."-".  date("Ymd").".pdf");
if ($_GET['type']==d){
    $pdf->Output("../print/".$_GET['pac_id'].".pdf", "F");
    #shell_exec("lpr ../print/".$_GET['wiz'].".pdf");
    
    shell_exec("lp -o media=A4 -d ".$_SESSION['global']['default_printer']." ../print/".$_GET['pac_id'].".pdf | lpstat | lpstat -t" );
    #echo "<pre>$output</pre>";
    #echo "Im Here";
    #śsleep(2);
    shell_exec("rm ../print/".$_GET['pac_id'].".pdf" );
    
}
else {
    shell_exec("rm ../print/*.pdf" );
$pdf->Output("../print/".$nazwa_pliku, "F");
echo "./print/".$nazwa_pliku;
}
?>
